home *** CD-ROM | disk | FTP | other *** search
/ Chip 1997 December / CHIPNET Aralık 1997.iso / oyun / elf.exe / ELF.EXE / 0 / RCDATA / TFUNCTIONWIZARD / TFUNCTIONWIZARD.txt
Text File  |  1997-02-13  |  17KB  |  750 lines

  1. object FunctionWizard: TFunctionWizard
  2.   Left = 210
  3.   Top = 121
  4.   BorderStyle = bsDialog
  5.   Caption = 'Function Wizard'
  6.   ClientHeight = 271
  7.   ClientWidth = 493
  8.   Font.Color = clWindowText
  9.   Font.Height = -11
  10.   Font.Name = 'MS Sans Serif'
  11.   Font.Style = []
  12.   Position = poScreenCenter
  13.   OnCreate = FormCreate
  14.   OnDestroy = FormDestroy
  15.   PixelsPerInch = 96
  16.   TextHeight = 13
  17.   object Label2: TLabel
  18.     Left = 4
  19.     Top = 8
  20.     Width = 41
  21.     Height = 13
  22.     Caption = 'Function'
  23.   end
  24.   object Bevel1: TBevel
  25.     Left = 160
  26.     Top = 8
  27.     Width = 5
  28.     Height = 257
  29.     Shape = bsLeftLine
  30.   end
  31.   object Info1: TLabel
  32.     Left = 172
  33.     Top = 148
  34.     Width = 105
  35.     Height = 13
  36.     Alignment = taRightJustify
  37.     AutoSize = False
  38.     Caption = 'Info1'
  39.     Visible = False
  40.   end
  41.   object Info2: TLabel
  42.     Left = 172
  43.     Top = 172
  44.     Width = 105
  45.     Height = 13
  46.     Alignment = taRightJustify
  47.     AutoSize = False
  48.     Caption = 'Info2'
  49.     Visible = False
  50.   end
  51.   object Info3: TLabel
  52.     Left = 172
  53.     Top = 196
  54.     Width = 105
  55.     Height = 13
  56.     Alignment = taRightJustify
  57.     AutoSize = False
  58.     Caption = 'Info3'
  59.     Visible = False
  60.   end
  61.   object Comms: TOutline
  62.     Left = 12
  63.     Top = 24
  64.     Width = 141
  65.     Height = 237
  66.     Lines.Nodes = (
  67.       'User windows'
  68.       #9'@WGET'
  69.       #9'@WLINES'
  70.       #9'@WMAXID'
  71.       #9'@WNUM'
  72.       #9'@WOPEN'
  73.       #9'@WOPEQ'
  74.       #9'@WSTAT'
  75.       #9'@WTITLE'
  76.       'File handling'
  77.       #9'@FOPW'
  78.       #9'@FOPR'
  79.       #9'@FOPA'
  80.       #9'@FNRD'
  81.       #9'@FSRD'
  82.       #9'@FEOF'
  83.       'Date and time'
  84.       #9'@GETDAY'
  85.       #9'@GETMONTH'
  86.       #9'@GETYEAR'
  87.       #9'@TIME'
  88.       'System'
  89.       #9'@IDLE'
  90.       #9'@ONLINE'
  91.       #9'@TICK'
  92.       #9'@TICKS'
  93.       #9'@TOTICK'
  94.       'Strings and conversions'
  95.       #9'@CHR'
  96.       #9'@LEN'
  97.       #9'@NTOS'
  98.       #9'@POS'
  99.       #9'@STON'
  100.       'Miscellaneous'
  101.       #9'@CRY'
  102.       #9'@DCRY'
  103.       #9'@INGROUP'
  104.       #9'@LASTMUD'
  105.       #9'@MYHP'
  106.       #9'@MYMANA'
  107.       #9'@MYMOV'
  108.       #9'@POPUPN'
  109.       #9'@POPUPS'
  110.       #9'@RND'
  111.       'Parameters handling'
  112.       #9'@PARMN'
  113.       #9'@PARMS'
  114.       'Colors'
  115.       #9'Background'
  116.       #9#9'@BGBlack'
  117.       #9#9'@BGBlue'
  118.       #9#9'@BGGreen'
  119.       #9#9'@BGCyan'
  120.       #9#9'@BGRed'
  121.       #9#9'@BGMagenta'
  122.       #9#9'@BGBrown'
  123.       #9#9'@BGLightGray'
  124.       #9#9'@BGDarkGray'
  125.       #9#9'@BGLightBlue'
  126.       #9#9'@BGLightGreen'
  127.       #9#9'@BGLightCyan'
  128.       #9#9'@BGLightRed'
  129.       #9#9'@BGLightMagenta'
  130.       #9#9'@BGYellow'
  131.       #9#9'@BGWhite'
  132.       #9'Foreground'
  133.       #9#9'@FGBlack'
  134.       #9#9'@FGBlue'
  135.       #9#9'@FGGreen'
  136.       #9#9'@FGCyan'
  137.       #9#9'@FGRed'
  138.       #9#9'@FGMagenta'
  139.       #9#9'@FGBrown'
  140.       #9#9'@FGLightGray'
  141.       #9#9'@FGDarkGray'
  142.       #9#9'@FGLightBlue'
  143.       #9#9'@FGLightGreen'
  144.       #9#9'@FGLightCyan'
  145.       #9#9'@FGLightRed'
  146.       #9#9'@FGLightMagenta'
  147.       #9#9'@FGYellow'
  148.       #9#9'@FGWhite'
  149.       #9'Special'
  150.       #9#9'@PushColors'
  151.       #9#9'@PopColors'
  152.       #9#9'@NormalColors'
  153.       #9#9'@HiColors')
  154.     OutlineStyle = osText
  155.     Options = [ooDrawFocusRect]
  156.     ItemHeight = 13
  157.     TabOrder = 0
  158.     OnClick = CommsClick
  159.     ItemSeparator = '\'
  160.   end
  161.   object Memo1: TMemo
  162.     Left = 64
  163.     Top = 4
  164.     Width = 61
  165.     Height = 17
  166.     Lines.Strings = (
  167.       'SYNTAX:'
  168.       '<command-name>'
  169.       'number of parameters'
  170.       'parameter-type space parameter-name'
  171.       '...'
  172.       '...'
  173.       'number of lines for the command'
  174.       'command lines   (parameters are inserted at #1#)'
  175.       '...'
  176.       '...'
  177.       'description'
  178.       ''
  179.       'PARAMETERS:'
  180.       
  181.         '- <NAME> <type>           type : - n : single number   can'#39't be ' +
  182.         'blank'
  183.       
  184.         '                                 - t : single text     can be bl' +
  185.         'ank'
  186.       
  187.         '                                 - v : variable        can'#39't be ' +
  188.         'blank'
  189.       
  190.         '                                 - e : expression      can'#39't be ' +
  191.         'blank'
  192.       '<@LASTMUD>'
  193.       '0'
  194.       '1'
  195.       '@LASTMUD'
  196.       
  197.         'Returns the name of the last mud you connected to since when ELF' +
  198.         ' was opened.'
  199.       '<@POS>'
  200.       '3'
  201.       't Text to search for'
  202.       't Text where to search'
  203.       'n Starting position'
  204.       '1'
  205.       '@POS(#1#)'
  206.       
  207.         '@POS(<sub-string>,<string>,<starting-position>) searches for the' +
  208.         ' first occurrence of <sub-string> in <string> searching from <st' +
  209.         'arting-position>.'
  210.       'Returns the position if found or 0 if not found.'
  211.       '<@PARMN>'
  212.       '1'
  213.       'n Parameter #'
  214.       '1'
  215.       '@PARMN(#1#a)'
  216.       
  217.         'Extracts a variable part from the line that activated the trigge' +
  218.         'r or the alias.'
  219.       '@ParmN returns a numeric value.'
  220.       '<@PARMS>'
  221.       '1'
  222.       'n Parameter #'
  223.       '1'
  224.       '@PARMS(#1#a)'
  225.       
  226.         'Extracts a variable part from the line that activated the trigge' +
  227.         'r or the alias.'
  228.       '@ParmS returns a string value.'
  229.       '<@WGET>'
  230.       '2'
  231.       'n Id'
  232.       'n Line #'
  233.       '1'
  234.       '@WGET(#1#)'
  235.       
  236.         '@WGET(<id>,<line #>) returns the content of the line of the user' +
  237.         ' window.'
  238.       '<@WLINES>'
  239.       '1'
  240.       'n Id'
  241.       '1'
  242.       '@WLINES(#1#)'
  243.       '@WLINES(<id>) returns the number of lines in the user windows.'
  244.       '<@WMAXID>'
  245.       '0'
  246.       '1'
  247.       '@WMAXID'
  248.       
  249.         '@WMAXID returns the highest id allocated at that moment by ELF f' +
  250.         'or user windows. This is useful to scan all of them together wit' +
  251.         'h @WSTAT.'
  252.       '<@WNUM>'
  253.       '1'
  254.       't Title'
  255.       '1'
  256.       '@WNUM(#1#)'
  257.       
  258.         '@WNUM(<title>) returns the id of the user window with that title' +
  259.         '. Returns -1 if such a window doesn'#39't exist.'
  260.       '<@WOPEN>'
  261.       '1'
  262.       't Title'
  263.       '1'
  264.       '@WOPEN(#1#)'
  265.       
  266.         '@WOPEN(<title>) opens a user window with the specified title and' +
  267.         ' returns an id. ELF remembers position and dimension (referenced' +
  268.         ' by title) of the user windows.'
  269.       '<@WOPEQ>'
  270.       '1'
  271.       't Title'
  272.       '1'
  273.       '@WOPEQ(#1#)'
  274.       
  275.         '@WOPEQ(<title>) opens a user window with the specified title and' +
  276.         ' returns an id. If a user window with the same title already exi' +
  277.         'sts then returns that id. ELF remembers position and dimension (' +
  278.         'referenced by title) of the user windows.'
  279.       '<@WSTAT>'
  280.       '1'
  281.       'n Id'
  282.       '1'
  283.       '@WSTAT(#1#)'
  284.       
  285.         '@WSTAT(<id>) returns a value depending on the visual status of t' +
  286.         'he user window referenced by id:0 - doesn'#39't exist 1 - iconicized' +
  287.         '2 - hidden3 - normal4 - zoomed'
  288.       '<@WTITLE>'
  289.       '1'
  290.       'n Id'
  291.       '1'
  292.       '@WTITLE(#1#)'
  293.       
  294.         '@WTITLE(<id>) returns the title of the user window referenced by' +
  295.         ' id. Returns '#39#39' if such a window doesn'#39't exist.'
  296.       '<@GETDAY>'
  297.       '0'
  298.       '1'
  299.       '@GETDAY'
  300.       'Returns the day of the month'
  301.       '<@GETMONTH>'
  302.       '0'
  303.       '1'
  304.       '@GETMONTH'
  305.       'Returns the current month'
  306.       '<@GETYEAR>'
  307.       '0'
  308.       '1'
  309.       '@GETYEAR'
  310.       'Returns the current year'
  311.       '<@TIME>'
  312.       '0'
  313.       '1'
  314.       '@TIME'
  315.       'Returns the hour in terms of seconds after midnight'
  316.       '<@IDLE>'
  317.       '0'
  318.       '1'
  319.       '@IDLE'
  320.       'Returns the number of seconds since the last key was pressed'
  321.       '<@ONLINE>'
  322.       '0'
  323.       '1'
  324.       '@ONLINE'
  325.       'Returns 1 if you are connected to a MUD, 0 otherwise'
  326.       '<@TICK>'
  327.       '0'
  328.       '1'
  329.       '@TICK'
  330.       'Returns the estimated TICK duration in seconds'
  331.       '<@TICKS>'
  332.       '0'
  333.       '1'
  334.       '@TICKS'
  335.       'Returns the number of TICKs recognised by ELF'
  336.       '<@TOTICK>'
  337.       '0'
  338.       '1'
  339.       '@TOTICK'
  340.       'Returns the number of seconds to the end of the TICK'
  341.       '<@CHR>'
  342.       '1'
  343.       'n ASCII code'
  344.       '1'
  345.       '@CHR(#1#)'
  346.       
  347.         '@CHR(<ASCII code>) returns the char with the corresponding ASCII' +
  348.         ' code.'
  349.       '<@LEN>'
  350.       '1'
  351.       't String'
  352.       '1'
  353.       '@LEN(#1#)'
  354.       '@LEN(<string>) returns the length of the specified string.'
  355.       '<@NTOS>'
  356.       '1'
  357.       'n Number'
  358.       '1'
  359.       '@NTOS(#1#)'
  360.       '@NTOS(<number>) converts a number into a string.'
  361.       '<@STON>'
  362.       '1'
  363.       't String'
  364.       '1'
  365.       '@STON(#1#)'
  366.       '@STON(<string>) converts a string into a number.'
  367.       '<@CRY>'
  368.       '2'
  369.       't Text'
  370.       't Password'
  371.       '1'
  372.       '@CRY(#1#)'
  373.       
  374.         '@CRY(<text>,<password>) encrypts <text> using the specified <pas' +
  375.         'sword>. Text and password are both strings. Returns a string. Th' +
  376.         'is function encrypts text in the range chr(32)..chr(127) (printa' +
  377.         'ble characters) returning text in the same printable range.'
  378.       '<@DCRY>'
  379.       '2'
  380.       't Text'
  381.       't Password'
  382.       '1'
  383.       '@DCRY(#1#)'
  384.       
  385.         '@DCRY(<text>,<password>) decrypts <text> using the specified <pa' +
  386.         'ssword>. Text and password are both strings. Returns a string.'
  387.       '<@INGROUP>'
  388.       '1'
  389.       't Name'
  390.       '1'
  391.       '@INGROUP(#1#)'
  392.       
  393.         '@INGROUP(<name>) checks whether the specified <name> is a member' +
  394.         ' of your group. Returns 0 if it isn'#39't, its index in the group if' +
  395.         ' it is.'
  396.       '<@MYHP>'
  397.       '0'
  398.       '1'
  399.       '@MYHP'
  400.       
  401.         '@MYHP returns the value of your HPs that ELF has extracted from ' +
  402.         'the PROMPT (you must correctly set the relevant parameters in th' +
  403.         'e general configuration page).'
  404.       '<@MYMANA>'
  405.       '0'
  406.       '1'
  407.       '@MYMANA'
  408.       
  409.         '@MYMANA returns the value of your MANA that ELF has extracted fr' +
  410.         'om the PROMPT (you must correctly set the relevant parameters in' +
  411.         ' the general configuration page).'
  412.       '<@MYMOV>'
  413.       '0'
  414.       '1'
  415.       '@MYMOV'
  416.       
  417.         '@MYMOV returns the value of your MOVement that ELF has extracted' +
  418.         ' from the PROMPT (you must correctly set the relevant parameters' +
  419.         ' in the general configuration page).'
  420.       '<@RND>'
  421.       '1'
  422.       'n Max value'
  423.       '1'
  424.       '@RND(#1#)'
  425.       
  426.         '@RND(<max>) returns a random value between 0 and max-1. Max must' +
  427.         ' be in range 0..65000.'
  428.       '<@FOPW>'
  429.       '1'
  430.       't File name'
  431.       '1'
  432.       '@FOPW(#1#)'
  433.       
  434.         '@FOPW(<file-name>) opens <file-name> for writing. Returns a nume' +
  435.         'ric id (0 if an error occurs). If the file already exists, it is' +
  436.         ' deleted before rewriting it.'
  437.       '<@FOPR>'
  438.       '1'
  439.       't File name'
  440.       '1'
  441.       '@FOPR(#1#)'
  442.       
  443.         '@FOPR(<file-name>) opens <file-name> for reading. Returns a nume' +
  444.         'ric id (0 if an error occurs). The file must exist.'
  445.       '<@FOPA>'
  446.       '1'
  447.       't File name'
  448.       '1'
  449.       '@FOPA(#1#)'
  450.       
  451.         '@FOPA(<file-name>) opens <file-name> for appending. Returns a nu' +
  452.         'meric id (0 if an error occurs).'
  453.       '<@FNRD>'
  454.       '1'
  455.       'n Id'
  456.       '1'
  457.       '@FNRD(#1#)'
  458.       '@FNRD(<id>) reads a number from the file identified by id.'
  459.       '<@FSRD>'
  460.       '1'
  461.       'n Id'
  462.       '1'
  463.       '@FSRD(#1#)'
  464.       '@FSRD(<id>) reads a string from the file identified by id.'
  465.       '<@FEOF>'
  466.       '1'
  467.       'n Id'
  468.       '1'
  469.       '@FEOF(#1#)'
  470.       
  471.         '@FEOF(<id>) returns 1 if the file identified by id has reached i' +
  472.         'ts end, 0 otherwise.'
  473.       '<@BGBlack>'
  474.       '0'
  475.       '1'
  476.       '@BGBlack'
  477.       'Sets the background color to BLACK.'
  478.       '<@BGBlue>'
  479.       '0'
  480.       '1'
  481.       '@BGBlue'
  482.       'Sets the background color to BLUE.'
  483.       '<@BGGreen>'
  484.       '0'
  485.       '1'
  486.       '@BGGreen'
  487.       'Sets the background color to GREEN.'
  488.       '<@BGCyan>'
  489.       '0'
  490.       '1'
  491.       '@BGCyan'
  492.       'Sets the background color to CYAN.'
  493.       '<@BGRed>'
  494.       '0'
  495.       '1'
  496.       '@BGRed'
  497.       'Sets the background color to RED.'
  498.       '<@BGMagenta>'
  499.       '0'
  500.       '1'
  501.       '@BGMagenta'
  502.       'Sets the background color to MAGENTA.'
  503.       '<@BGBrown>'
  504.       '0'
  505.       '1'
  506.       '@BGBrown'
  507.       'Sets the background color to BROWN.'
  508.       '<@BGLightGray>'
  509.       '0'
  510.       '1'
  511.       '@BGLightGray'
  512.       'Sets the background color to LIGHT GRAY.'
  513.       '<@BGDarkGray>'
  514.       '0'
  515.       '1'
  516.       '@BGDarkGray'
  517.       'Sets the background color to DARK GRAY.'
  518.       '<@BGLightBlue>'
  519.       '0'
  520.       '1'
  521.       '@BGLightBlue'
  522.       'Sets the background color to LIGHT BLUE.'
  523.       '<@BGLightGreen>'
  524.       '0'
  525.       '1'
  526.       '@BGLightGreen'
  527.       'Sets the background color to LIGHT GREEN.'
  528.       '<@BGLightCyan>'
  529.       '0'
  530.       '1'
  531.       '@BGLightCyan'
  532.       'Sets the background color to LIGHT CYAN.'
  533.       '<@BGLightRed>'
  534.       '0'
  535.       '1'
  536.       '@BGLightRed'
  537.       'Sets the background color to LIGHT RED.'
  538.       '<@BGLightMagenta>'
  539.       '0'
  540.       '1'
  541.       '@BGLightMagenta'
  542.       'Sets the background color to LIGHT MAGENTA.'
  543.       '<@BGYellow>'
  544.       '0'
  545.       '1'
  546.       '@BGYellow'
  547.       'Sets the background color to YELLOW.'
  548.       '<@BGWhite>'
  549.       '0'
  550.       '1'
  551.       '@BGWhite'
  552.       'Sets the background color to WHITE.'
  553.       '<@FGBlack>'
  554.       '0'
  555.       '1'
  556.       '@FGBlack'
  557.       'Sets the foreground color to BLACK.'
  558.       '<@FGBlue>'
  559.       '0'
  560.       '1'
  561.       '@FGBlue'
  562.       'Sets the foreground color to BLUE.'
  563.       '<@FGGreen>'
  564.       '0'
  565.       '1'
  566.       '@FGGreen'
  567.       'Sets the foreground color to GREEN.'
  568.       '<@FGCyan>'
  569.       '0'
  570.       '1'
  571.       '@FGCyan'
  572.       'Sets the foreground color to CYAN.'
  573.       '<@FGRed>'
  574.       '0'
  575.       '1'
  576.       '@FGRed'
  577.       'Sets the foreground color to RED.'
  578.       '<@FGMagenta>'
  579.       '0'
  580.       '1'
  581.       '@FGMagenta'
  582.       'Sets the foreground color to MAGENTA.'
  583.       '<@FGBrown>'
  584.       '0'
  585.       '1'
  586.       '@FGBrown'
  587.       'Sets the foreground color to BROWN.'
  588.       '<@FGLightGray>'
  589.       '0'
  590.       '1'
  591.       '@FGLightGray'
  592.       'Sets the foreground color to LIGHT GRAY.'
  593.       '<@FGDarkGray>'
  594.       '0'
  595.       '1'
  596.       '@FGDarkGray'
  597.       'Sets the foreground color to DARK GRAY.'
  598.       '<@FGLightBlue>'
  599.       '0'
  600.       '1'
  601.       '@FGLightBlue'
  602.       'Sets the foreground color to LIGHT BLUE.'
  603.       '<@FGLightGreen>'
  604.       '0'
  605.       '1'
  606.       '@FGLightGreen'
  607.       'Sets the foreground color to LIGHT GREEN.'
  608.       '<@FGLightCyan>'
  609.       '0'
  610.       '1'
  611.       '@FGLightCyan'
  612.       'Sets the foreground color to LIGHT CYAN.'
  613.       '<@FGLightRed>'
  614.       '0'
  615.       '1'
  616.       '@FGLightRed'
  617.       'Sets the foreground color to LIGHT RED.'
  618.       '<@FGLightMagenta>'
  619.       '0'
  620.       '1'
  621.       '@FGLightMagenta'
  622.       'Sets the foreground color to LIGHT MAGENTA.'
  623.       '<@FGYellow>'
  624.       '0'
  625.       '1'
  626.       '@FGYellow'
  627.       'Sets the foreground color to YELLOW.'
  628.       '<@FGWhite>'
  629.       '0'
  630.       '1'
  631.       '@FGWhite'
  632.       'Sets the foreground color to WHITE.'
  633.       '<@PushColors>'
  634.       '0'
  635.       '1'
  636.       '@PushColors'
  637.       
  638.         'Saves the actual colors of the line at the point where it is ins' +
  639.         'erted.'
  640.       
  641.         'Useful to temporarily modify a color in a word that is part of a' +
  642.         ' line that already shows colors.'
  643.       '<@PopColors>'
  644.       '0'
  645.       '1'
  646.       '@PopColors'
  647.       'Restores the colors of the line saved by @PushColor.'
  648.       
  649.         'Useful to temporarily modify a color in a word that is part of a' +
  650.         ' line that already shows colors.'
  651.       '<@NormalColors>'
  652.       '0'
  653.       '1'
  654.       '@NormalColors'
  655.       'Restores default colors.'
  656.       '<@HiColors>'
  657.       '0'
  658.       '1'
  659.       '@HiColors'
  660.       'Selects high-intensity foreground colors.'
  661.       
  662.         'This function is present only for compatibility. Use explicit co' +
  663.         'lor definition instead.'
  664.       '<@PopupN>'
  665.       '0'
  666.       '1'
  667.       '@PopupN("t1",...,"tn")'
  668.       
  669.         'Shows a popup menu with the specified items at mouse position. R' +
  670.         'eturns a numeric value containing the number of the selected ite' +
  671.         'm (first items is number 1).'
  672.       'Returns 0 if no item is selected.'
  673.       '<@PopupS>'
  674.       '0'
  675.       '1'
  676.       '@PopupS("t1",...,"tn")'
  677.       
  678.         'Shows a popup menu with the specified items at mouse position. R' +
  679.         'eturns a string value containing the selected item.'
  680.       'Returns a null string if no item is selected.'
  681.       '<@@@>')
  682.     TabOrder = 1
  683.     Visible = False
  684.     WordWrap = False
  685.   end
  686.   object Edit1: TEdit
  687.     Left = 280
  688.     Top = 144
  689.     Width = 209
  690.     Height = 21
  691.     TabOrder = 2
  692.     Visible = False
  693.     OnChange = Edit1Change
  694.   end
  695.   object Edit2: TEdit
  696.     Left = 280
  697.     Top = 168
  698.     Width = 209
  699.     Height = 21
  700.     TabOrder = 3
  701.     Visible = False
  702.     OnChange = Edit1Change
  703.   end
  704.   object Edit3: TEdit
  705.     Left = 280
  706.     Top = 192
  707.     Width = 209
  708.     Height = 21
  709.     TabOrder = 4
  710.     Visible = False
  711.     OnChange = Edit1Change
  712.   end
  713.   object Memo2: TMemo
  714.     Left = 168
  715.     Top = 8
  716.     Width = 321
  717.     Height = 125
  718.     BorderStyle = bsNone
  719.     Color = clBtnFace
  720.     Ctl3D = True
  721.     Lines.Strings = (
  722.       'Select a function from the list.'
  723.       'The necessary parameters will be shown.'
  724.       'Enter them and then press OK.'
  725.       ''
  726.       'That'#39's all :-)')
  727.     ParentCtl3D = False
  728.     ReadOnly = True
  729.     TabOrder = 5
  730.   end
  731.   object BitBtn1: TBitBtn
  732.     Left = 392
  733.     Top = 232
  734.     Width = 75
  735.     Height = 25
  736.     TabOrder = 6
  737.     Kind = bkCancel
  738.   end
  739.   object ok: TBitBtn
  740.     Left = 308
  741.     Top = 232
  742.     Width = 75
  743.     Height = 25
  744.     Enabled = False
  745.     TabOrder = 7
  746.     OnClick = okClick
  747.     Kind = bkOK
  748.   end
  749. end
  750.